@Flag(Room1FloorWash) @Variable[#DateDifference(Room1Wash, Days)]>=[30] @NullResponse @Goto(Room1Wash)
@Variable[#DateDifference(Room1Wipe, Days)]>=[14] @NullResponse @Goto(Room1Wipe)
@Variable[#DateDifference(Room1Vacuum, Days)]>=[7] @NullResponse @Goto(Room1Vacuum)
(Room1Wash)
@NullResponse @TempFlag(Room1WashFloorTemp)
@SystemMessage #VANC #VANP Room 1! @ShowImage[\GNMImages\Home\*.jpg]
@SystemMessage #VANC #VANP @RT(It's time to mop the floors!,Time for you to mop the floors,Lets have you do some floor mopping!,Time to mop mop mop #GNMGrin,Work work work all day - mop all night #GNMLol) 
@SystemMessage #VANC #VANP But @RT(first,before that,before we get to that,just before)
@SystemMessage #VANC #VANP @RT(They need to be vacuumed,You have to vacuum them first,You gotta go ahead and vacuum them..) 
@SystemMessage #VANC #VANP @RT(Fetch,Find and get,Retrieve) your vacuum cleaner, and whatever you need to mop the floors. @Wait(10) @Goto(Loop)
(Room1Wipe)
@NullResponse @TempFlag(Room1WipeTemp)
@SystemMessage #VANC #VANP Room 1! @ShowImage[\GNMImages\Home\*.jpg]
@SystemMessage #VANC #VANP @RT(It's time to wipe the surfaces!,Time for you to wipe the surfaces,Lets have you do some wiping!,Time to wipe wipe wipe #GNMGrin,Work work work all day - wipe all night #GNMLol)
@SystemMessage #VANC #VANP But @RT(first,before that,before we get to that,just before)
@SystemMessage #VANC #VANP @RT(You need to be vacuum the floor and other surfaces,You have to vacuum the floor and surfaces first,You gotta go ahead and vacuum the floor then the surfaces..) 
@SystemMessage #VANC #VANP @RT(Fetch,Find and get,Retrieve) your vacuum cleaner, and whatever you need to wipe and properly clean the surfaces. @Wait(10) @Goto(Loop)
(Room1Vacuum)
@NullResponse @TempFlag(Room1VacuumFloorTemp)
@SystemMessage #VANC #VANP Room 1! @ShowImage[\GNMImages\Home\*.jpg]
@SystemMessage #VANC #VANP @RT(It's time to vacuum!,Time for you to vacuum the floor,Lets have you do some vacuuming!,Time to clean clean clean #GNMGrin,Work work work all day - clean all night #GNMLol)
@SystemMessage #VANC #VANP @RT(You need to be vacuum the floor,You have to vacuum the floor,You gotta go ahead and vacuum the floor) 
@SystemMessage #VANC #VANP @RT(Fetch,Find and get,Retrieve) your vacuum cleaner @Wait(10) @Goto(Loop)
(Loop)
@SystemMessage #VANC #VANP #GNMReady
[yes]@SystemMessage #VANC #VANP #GNMGood
[no]@SystemMessage #VANC #VANP Hurry.. @Wait(10) @Goto(Loop)
@DifferentAnswer @SystemMessage #VANC #VANP #GNMYesOrNo
@NullResponse @CallReturn(CR\BackgroundMode\Chores\KinkyCleaning.txt)
@SystemMessage #VANC #VANP Okay then 
@SystemMessage #VANC #VANP You can go ahead and start with the cleaning.. 
@SystemMessage #VANC #VANP Report when you're done cleaning @CustomMode(#Done, Goto, Done)
(StartTimer)
@NullResponse @SetVar[CleaningTimeTemp]=[0]
@NullResponse @CountVar[CleaningTimeTemp]
@NullResponse @CheckFlag(BellGame1)
@NullResponse @CheckFlag(BellGame2) @Goto(Timer)
(BellGame1)
@NullResponse @Wait(#Random(20,120)) @Goto(Corner)
(Corner)
@SystemMessage #VANC #VANP Go to the corner #SlaveName @PlayAudio[\GNMSounds\SpecialSounds\Bell.mp3] @CountVar[CleaningTimeTemp, Stop] @Wait(#Random(20,60))
@SystemMessage #VANC #VANP Return to work #SlaveName @PlayAudio[\GNMSounds\SpecialSounds\Bell.mp3] @CountVar[CleaningTimeTemp] @Goto(BellGame1)
(BellGame2)
@NullResponse @Wait(#Random(20,120)) @Goto(Sentence)
(Sentence)
@NullResponse @PlayAudio[\GNMSounds\SpecialSounds\Bell.mp3] @CountVar[CleaningTimeTemp, Stop]
(Type)
@SystemMessage #VANC #VANP @RT(I have to clean properly,I'm a cleaning slut,I have to clean with a smile,Cleaning makes me happy,You can never clean enough,I wish I could clean all day,I really love cleaning)
[i have to clean properly]@SystemMessage #VANC #VANP Get back to cleaning
[i'm a cleaning slut]@SystemMessage #VANC #VANP Get back to cleaning
[i have to clean with a smile]@SystemMessage #VANC #VANP Get back to cleaning
[cleaning makes me happy]@SystemMessage #VANC #VANP Get back to cleaning 
[you can never clean enough]@SystemMessage #VANC #VANP Get back to cleaning 
[i wish i could clean all day]@SystemMessage #VANC #VANP Get back to cleaning
[i really love cleaning]@SystemMessage #VANC #VANP Get back to cleaning 
@AcceptAnswer @SystemMessage #VANC #VANP Wrong.. Try again.. @Goto(Type)
@SystemMessage #VANC #VANP Return to work @CountVar[CleaningTimeTemp] @Goto(BellGame2)
(Timer)
@NullResponse @Wait(99999)
(Done)
@NullResponse @CustomMode(#Done,Normal) @CountVar[CleaningTimeTemp, Stop]
@SystemMessage #VANC #VANP So you're done.. 
@NullResponse @RapidCodeOn @CheckFlag(Room1AverageSet)
@NullResponse @CheckFlag(Room15AverageSet)
@NullResponse @CheckFlag(Room14AverageSet)
@NullResponse @CheckFlag(Room13AverageSet)
@NullResponse @CheckFlag(Room12AverageSet)
@NullResponse @Goto(Room11AverageSet)
(Room11AverageSet)
@NullResponse @SetVar[Room11Average]=[0] @SetFlag(Room12AverageSet)
@NullResponse @ChangeVar[Room11Average]=[Room11Average]+[CleaningTimeTemp] @Goto(Satisfied)
(Room12AverageSet)
@NullResponse @SetVar[Room12Average]=[0] @SetFlag(Room13AverageSet)
@NullResponse @ChangeVar[Room12Average]=[Room12Average]+[CleaningTimeTemp] @Goto(Satisfied)
(Room13AverageSet)
@NullResponse @SetVar[Room13Average]=[0] @SetFlag(Room14AverageSet)
@NullResponse @ChangeVar[Room13Average]=[Room13Average]+[CleaningTimeTemp] @Goto(Satisfied)
(Room14AverageSet)
@NullResponse @SetVar[Room14Average]=[0] @SetFlag(Room15AverageSet)
@NullResponse @ChangeVar[Room14Average]=[Room14Average]+[CleaningTimeTemp] @Goto(Satisfied)
(Room15AverageSet)
@NullResponse @SetVar[Room15Average]=[0] @SetFlag(Room1AverageSet)
@NullResponse @ChangeVar[Room15Average]=[Room15Average]+[CleaningTimeTemp]
@NullResponse @SetVar[Room1Average]=[0]
@NullResponse @ChangeVar[Room1Average]=[Room1Average]+[Room11Average]
@NullResponse @ChangeVar[Room1Average]=[Room1Average]+[Room12Average]
@NullResponse @ChangeVar[Room1Average]=[Room1Average]+[Room13Average]
@NullResponse @ChangeVar[Room1Average]=[Room1Average]+[Room14Average]
@NullResponse @ChangeVar[Room1Average]=[Room1Average]+[Room15Average]
@NullResponse @ChangeVar[Room1Average]=[Room1Average]/[5]
@NullResponse @SetVar[Room1Slow]=[0]
@NullResponse @ChangeVar[Room1Slow]=[Room1Slow]+[Room1Average]
@NullResponse @ChangeVar[Room1Slow]=[Room1Slow]*[2]
@NullResponse @SetVar[Room1Fast]=[0]
@NullResponse @ChangeVar[Room1Fast]=[Room1Fast]+[Room1Average]
@NullResponse @ChangeVar[Room1Fast]=[Room1Fast]/[2]
@NullResponse @SetVar[Room1ScopeLow]=[0]
@NullResponse @ChangeVar[Room1ScopeLow]=[Room1ScopeLow]+[Room1Average]
@NullResponse @ChangeVar[Room1ScopeLow]=[Room1ScopeLow]/[4]
@NullResponse @ChangeVar[Room1ScopeLow]=[Room1ScopeLow]*[3]
@NullResponse @SetVar[Room1ScopeHigh]=[0]
@NullResponse @ChangeVar[Room1ScopeHigh]=[Room1ScopeHigh]+[Room1Average]
@NullResponse @ChangeVar[Room1ScopeHigh]=[Room1ScopeHigh]/[4]
@NullResponse @ChangeVar[Room1ScopeHigh]=[Room1ScopeHigh]*[5]
@NullResponse @SetVar[Room1WipeTime]=[0]
@NullResponse @ChangeVar[Room1WipeTime]=[Room1WipeTime]+[Room1Average]
@NullResponse @ChangeVar[Room1WipeTime]=[Room1WipeTime]/[4]
@NullResponse @ChangeVar[Room1WipeTime]=[Room1WipeTime]*[5]
@NullResponse @SetVar[Room1WipeSlow]=[0]
@NullResponse @ChangeVar[Room1WipeSlow]=[Room1WipeSlow]+[Room1WipeTime]
@NullResponse @ChangeVar[Room1WipeSlow]=[Room1WipeSlow]*[2]
@NullResponse @SetVar[Room1WipeFast]=[0]
@NullResponse @ChangeVar[Room1WipeFast]=[Room1WipeFast]+[Room1WipeTime]
@NullResponse @ChangeVar[Room1WipeFast]=[Room1WipeFast]/[2]
@NullResponse @SetVar[Room1WipeScopeLow]=[0]
@NullResponse @ChangeVar[Room1WipeScopeLow]=[Room1WipeScopeLow]+[Room1WipeTime]
@NullResponse @ChangeVar[Room1WipeScopeLow]=[Room1WipeScopeLow]/[4]
@NullResponse @ChangeVar[Room1WipeScopeLow]=[Room1WipeScopeLow]*[3]
@NullResponse @SetVar[Room1WipeScopeHigh]=[0]
@NullResponse @ChangeVar[Room1WipeScopeHigh]=[Room1WipeScopeHigh]+[Room1WipeTime]
@NullResponse @ChangeVar[Room1WipeScopeHigh]=[Room1WipeScopeHigh]/[4]
@NullResponse @ChangeVar[Room1WipeScopeHigh]=[Room1WipeScopeHigh]*[5]
@NullResponse @SetVar[Room1WashTime]=[0]
@NullResponse @ChangeVar[Room1WashTime]=[Room1WashTime]+[Room1Average]
@NullResponse @ChangeVar[Room1WashTime]=[Room1WashTime]/[4]
@NullResponse @ChangeVar[Room1WipeTime]=[Room1WipeTime]*[5]
@NullResponse @SetVar[Room1WashSlow]=[0]
@NullResponse @ChangeVar[Room1WashSlow]=[Room1WashSlow]+[Room1WashTime]
@NullResponse @ChangeVar[Room1WashSlow]=[Room1WashSlow]*[2]
@NullResponse @SetVar[Room1WashFast]=[0]
@NullResponse @ChangeVar[Room1WashFast]=[Room1WashFast]+[Room1WashTime]
@NullResponse @ChangeVar[Room1WashFast]=[Room1WashFast]/[2]
@NullResponse @SetVar[Room1WashScopeLow]=[0]
@NullResponse @ChangeVar[Room1WashScopeLow]=[Room1WashScopeLow]+[Room1WashTime]
@NullResponse @ChangeVar[Room1WashScopeLow]=[Room1WashScopeLow]/[4]
@NullResponse @ChangeVar[Room1WashScopeLow]=[Room1WashScopeLow]*[3]
@NullResponse @SetVar[Room1WashScopeHigh]=[0]
@NullResponse @ChangeVar[Room1WashScopeHigh]=[Room1WashScopeHigh]+[Room1WashTime]
@NullResponse @ChangeVar[Room1WashScopeHigh]=[Room1WashScopeHigh]/[4]
@NullResponse @ChangeVar[Room1WashScopeHigh]=[Room1WashScopeHigh]*[5]
(Room1AverageSet)
@Flag(Room1VacuumFloorTemp) @NullResponse @Goto(Vacuum)
@Flag(Room1WipeTemp) @NullResponse @Goto(Wipe)
@Flag(Room1WashFloorTemp) @NullResponse @Goto(Wash)
@NullResponse @Goto(Vacuum)
(Vacuum)
@NullResponse @If[CleaningTimeTemp]>=[Room1ScopeLow]AND[CleaningTimeTemp]<=[Room1ScopeHigh]Then(EndPerfect)
@NullResponse @If[CleaningTimeTemp]<=[Room1Fast]Then(EndFast)
@NullResponse @If[CleaningTimeTemp]>=[Room1Slow]Then(EndSlow)
@NullResponse @If[CleaningTimeTemp]<=[Room1ScopeLow]Then(EndSlower)
@NullResponse @If[CleaningTimeTemp]>=[Room1ScopeHigh]Then(EndFaster)
(Wipe)
@NullResponse @If[CleaningTimeTemp]>=[Room1WipeScopeLow]AND[CleaningTimeTemp]<=[Room1WipeScopeHigh]Then(EndPerfect)
@NullResponse @If[CleaningTimeTemp]<=[Room1WipeFast]Then(EndFast)
@NullResponse @If[CleaningTimeTemp]>=[Room1WipeSlow]Then(EndSlow)
@NullResponse @If[CleaningTimeTemp]<=[Room1WipeScopeLow]Then(EndSlower)
@NullResponse @If[CleaningTimeTemp]>=[Room1WipeScopeHigh]Then(EndFaster)
(Wash)
@NullResponse @If[CleaningTimeTemp]>=[Room1WashScopeLow]AND[CleaningTimeTemp]<=[Room1WashScopeHigh]Then(EndPerfect)
@NullResponse @If[CleaningTimeTemp]<=[Room1WashFast]Then(EndFast)
@NullResponse @If[CleaningTimeTemp]>=[Room1WashSlow]Then(EndSlow)
@NullResponse @If[CleaningTimeTemp]<=[Room1WashScopeLow]Then(EndSlower)
@NullResponse @If[CleaningTimeTemp]>=[Room1WashScopeHigh]Then(EndFaster)
(Satisfied)
@SystemMessage #VANC #VANP Good job today #SlaveName @Goto(FlagTest)
(EndFast)
@SystemMessage #VANC #VANP @RT(Too fast!,That was waay too fast #SlaveName !!,Impossible,You cant possible be this fast!)
@SystemMessage #VANC #VANP @RT(That cant go unpunished,I have to punish you for this,I'm gonna have to punish you..) 
@SystemMessage #VANC #VANP I have assigned you punishment points @ChangeVar[GNMPPoints]=[GNMPPoints]+[200] @Goto(FlagTest)
(EndSlow)
@SystemMessage #VANC #VANP @RT(You're late!,You're late #SlaveName,You're late slut..,Late are we?,You know you're late right?)
@SystemMessage #VANC #VANP @RT(I dont tolerate late!,You know I dont tolerate it when you're late,There is zero tolerance for being late and lazy!) 
@SystemMessage #VANC #VANP I have assigned you punishment points @ChangeVar[GNMPPoints]=[GNMPPoints]+[200] @Goto(FlagTest)
(EndSlower)
@SystemMessage #VANC #VANP You've been slower than usual.. @CheckFlag(CleaningWarning)
@SystemMessage #VANC #VANP Anything I should know?
[lazy,laziness]@SystemMessage #VANC #VANP @RT(Inexcusable!,You know that laziness cant be tolerated!)
[tired,need rest,sleep]@SystemMessage #VANC #VANP @RT(Inexcusable,I dont care if you're tired!)
[toys,you made me,you told me]@SystemMessage #VANC #VANP @RT(Excuses! really!?,Wauv you're gonna blame me..)
[thorough,better cleaning]@SystemMessage #VANC #VANP I see but you should always be thorough!
[dirty,dirtier,dusty]@SystemMessage #VANC #VANP Your #Home should always be tidy!
@AcceptAnswer @SystemMessage #VANC #VANP I'm giving you a warning #SlaveName @SetFlag(CleaningWarning) @Goto(FlagTest)
@SystemMessage #VANC #VANP @RT(I'm gonna have to punish you slave,I'm sorry but this cant go unpunished)
@SystemMessage #VANC #VANP I have assigned you punishment points @ChangeVar[GNMPPoints]=[GNMPPoints]+[100] @Goto(FlagTest)
(CleaningWarning)
@SystemMessage #VANC #VANP I gave you a warning last time! @DeleteFlag(CleaningWarning)
@SystemMessage #VANC #VANP So this time I'm punishing you! 
@SystemMessage #VANC #VANP I have assigned you punishment points @ChangeVar[GNMPPoints]=[GNMPPoints]+[100] @Goto(FlagTest)
(EndFaster)
@SystemMessage #VANC #VANP You've been faster than usual.. @CheckFlag(CleaningWarning)
@SystemMessage #VANC #VANP Anything I should know?
@SystemMessage #VANC #VANP You cant haste thoroughness!
@SystemMessage #VANC #VANP I expect that you're always thorough when cleaning
@SystemMessage #VANC #VANP @RT(I'm gonna have to punish you slave,I'm sorry but this cant go unpunished)
@SystemMessage #VANC #VANP I have assigned you punishment points @ChangeVar[GNMPPoints]=[GNMPPoints]+[100] @Goto(FlagTest)
(EndPerfect)
@SystemMessage #VANC #VANP #GNMGood #SlaveName #MeritChangePMedium
@SystemMessage #VANC #VANP Allow me to reward your @RT(splendid,good,exelent,lovely) @RT(behaviour,work) #GNMGrin @ChangeVar[GNMGold]=[GNMGold]+[#GoldMedium] @Goto(FlagTest)
(FlagTest)
@NullResponse @CheckFlag(Room1WashFloorTemp)
@NullResponse @CheckFlag(Room1VacuumFloorTemp)
@NullResponse @CheckFlag(Room1WipeTemp) @Goto(Room1VacuumFloorTemp)
(Room1VacuumFloorTemp)
@NullResponse @ChangeVar[ChoreComplete]=[ChoreComplete]+[1] @SetDate(Room1Vacuum, 0 days)
@End
(Room1WashFloorTemp)
@NullResponse @ChangeVar[ChoreComplete]=[ChoreComplete]+[1] @SetDate(Room1Vacuum, 0 days)
@NullResponse @SetDate(Room1Wash, 0 days)
@End
(Room1WipeTemp)
@NullResponse @ChangeVar[ChoreComplete]=[ChoreComplete]+[1] @SetDate(Room1Vacuum, 0 days)
@NullResponse @SetDate(Room1Wipe, 0 days)
@End